SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
CREATE FUNCTION [dbo].[FN_COOPRC_CNTB_Q02]  
/*--------------------------------------------------------*/  
/*---- Empresa	: OFISIS S.A				----*/  
/*---- Cliente	: OFISIS S.A				----*/  
/*---- Sistema	: Tesoreria         			----*/  
/*---- Modulo	: Empresa           			----*/  
/*---- Programa	: Devuelve Nombre Libro Contable  	----*/  
/*---- Desarrollado por	: Carlos MARQUEZ ESCOBAR	----*/  
/*---- Fecha Creacion	: 09/11/2005     			----*/  
/*---- Base de Datos	: SQL     				----*/  
/*---- Version			: 2000     			----*/  
/*--------------------------------------------------------*/  
/*---- Comentarios		: 				----*/  
/*---- Drop FUNCTION FN_COOPRC_CNTB_Q02			----*/  
/*---- Grant Execute on FN_COOPRC_CNTB_Q02 to public	----*/  
/*----								----*/  
/*--------------------------------------------------------*/  
/*----   
Declare @OSDE_OPRC TD_VC_050
Select @OSDE_OPRC = dbo.FN_COOPRC_CNTB_Q02('01', '001')  
Select @OSDE_OPRC       ---*/  
/*------------------------------------------------------*/  
(  
@ISCO_EMPR  TD_VC_002,  
@ISCO_TIPO_OPER  TD_VC_003  
  
) RETURNS TD_VC_050
  
As   
BEGIN  
 Declare   

 @OSDE_OPRC	TD_VC_050,
 @VSCO_OPRC_CNTB TD_VC_003
  
 Set @OSDE_OPRC = Null
 Set @VSCO_OPRC_CNTB = Null
  
 /**** Operacion ******/  
 Select @VSCO_OPRC_CNTB = IsNull( Max( IsNull( t2.CO_OPRC_CNTB, '')), '')
 From  TTTIPO_OPER T1,  TDTIPO_OPER T2
 Where	
		t1.CO_EMPR = @ISCO_EMPR And
		t1.CO_TIPO_OPER = @ISCO_TIPO_OPER And
		t1.CO_EMPR = t2.CO_EMPR And
		t1.CO_TIPO_OPER = t2.CO_TIPO_OPER


 /**** Descripción ******/  
 Select @OSDE_OPRC = IsNull( Max( IsNull( DE_OPRC, '')), '')
 From  TMOPRC_CNTB
 Where	
		CO_EMPR = @ISCO_EMPR And
		CO_OPRC_CNTB = @VSCO_OPRC_CNTB 
 RETURN (@OSDE_OPRC)  

END  

/*------------------------ FIN ----------------------------*/

GO
